VecValueTemp=[26 28 29 31 32 33 35 37 40 41 42 43 201];
for n1=1:size(VecValueTemp,2)
    FilterFourthLevelEditorsCoAuthors(VecValueTemp(1,n1));
    FilterFourthLevelEditorsCoAuthors2(VecValueTemp(1,n1));
end